home *** CD-ROM | disk | FTP | other *** search
/ F1 Licenseware / F1 Licenseware - Volume 1.iso / disks / 003.dms / 003.adf / EXAMPLE_PROGRAMS / example13_2.AMOS / example13_2.amosSourceCode
AMOS Source Code  |  1993-02-25  |  849b  |  36 lines
  1. Rem EXAMPLE13_2.Amos 
  2. '
  3. '
  4. Rem Open screen 0
  5. Screen Open 0,228,80,4,Lowres : Curs Off : Paper 2 : Pen 3 : Cls 2
  6. '
  7. '
  8. Rem Open another screen, I.D of 1
  9. Screen Open 1,150,100,8,Lowres
  10. '
  11. '
  12. Rem the 0 is the screen to be postioned
  13. Rem The 190 is the x coordinate, using hardware coordinates  
  14. Rem 112 is the left edge of the screen 
  15. Rem  85 is the y postion 0-312 
  16. RemThe two commas mean use width and height from the selected screen 
  17. Screen Display 0,190,85,,
  18. '
  19. '
  20. Rem now set up screen 1s postion 
  21. Screen Display 1,130,200,,
  22. '
  23. '
  24. Rem set the current screen to be 0 so we can print to it 
  25. Screen 0
  26. Locate 0,3 : Print " POSITIONING SCREENS USING        SCREEN DISPLAY"
  27. Rem This command returns everthing to Amos's system defaults including screens.
  28. '
  29. '
  30. Rem setscreen to 1 to print to it
  31. Screen 1
  32. Print "This is screen 1     press a key"
  33. '
  34. '
  35. Wait Key 
  36. Default